home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Apple II Magazines (DO)
/
Micro on the Apple Volume 2 (1981)(Micro Ink).zip
/
Micro on the Apple Volume 2 (1981)(Micro Ink).do
/
TRACE TEST.int
< prev
next >
Wrap
Text File
|
1996-12-24
|
481b
|
16 lines
0 REM *** REPEATED ***
10 TRACE
30 GOSUB 100+ RND (3)*10
40 FOR I=1 TO 10:NEXT I
50 GOTO 30
100 PRINT "LINE100":RETURN
110 PRINT "LINE110":RETURN
120 PRINT "LINE120":POP
125 NO TRACE :PRINT
130 PRINT "'RUN 30000'":PRINT "'RUN' TO RUN REAL-TIME TEST AGAIN"
140 PRINT :PRINT "'RUN 32000'":PRINT "'RUN' TO RUN POST-TIME TEST AGAIN"
150 PRINT "'GOTO 32020' TO LIST POST-EXEC LINES"
160 CALL -22447:REM RESTORE DOS HOOKS FOR 48K MACHINE
170 END
200 REM EXAMPLE PROGRAM TO TRACE